home *** CD-ROM | disk | FTP | other *** search
/ Software of the Month Club 1996 June / Software of the Month Club 1996 June.iso / pc / dos / biz / easybase / pack1.prg / NETOUT / DEMOAPP / PROC18.PRO < prev    next >
Unknown  |  1995-11-22  |  373 b 
open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text

This file was not able to be converted.
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
1% dexvert MSX Protracker Module (music/msxProtrackerModule) ext Unsupported
1% dexvert Show Partner Mastered Show (other/showPartnerMasteredShow) ext Unsupported
100% file data default
100% disktype Blank disk/medium default (weak)


hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 14 00 64 65 63 6c 61 72 | 65 20 76 61 72 69 61 62 |..declar|e variab|
|00000010| 6c 65 73 0d 0a 20 20 20 | 78 20 61 73 20 6e 75 6d |les..   |x as num|
|00000020| 62 65 72 20 3a 79 20 61 | 73 20 6e 75 6d 62 65 72 |ber :y a|s number|
|00000030| 0d 0a 65 6e 64 0d 0a 4c | 6f 63 6b 20 6c 61 73 74 |..end..L|ock last|
|00000040| 0d 0a 4c 6f 63 6b 20 52 | 65 63 6f 72 64 73 0d 0a |..Lock R|ecords..|
|00000050| 50 61 63 6b 20 52 65 63 | 6f 72 64 73 0d 0a 69 6e |Pack Rec|ords..in|
|00000060| 64 65 78 20 6f 66 66 0d | 0a 66 6f 72 20 72 65 63 |dex off.|.for rec|
|00000070| 6f 72 64 73 0d 0a 20 20 | 20 78 20 3d 20 78 20 2b |ords..  | x = x +|
|00000080| 20 31 0d 0a 20 20 20 79 | 20 3d 20 72 65 63 6f 72 | 1..   y| = recor|
|00000090| 64 73 2e 74 6f 74 61 6c | 20 72 65 63 6f 72 64 73 |ds.total| records|
|000000a0| 0d 0a 20 20 20 72 65 63 | 6f 72 64 73 2e 4e 6f 20 |..   rec|ords.No |
|000000b0| 3d 20 78 0d 0a 20 20 20 | 64 69 73 70 6c 61 79 20 |= x..   |display |
|000000c0| 73 74 61 74 75 73 20 22 | 52 65 6e 75 6d 62 65 72 |status "|Renumber|
|000000d0| 69 6e 67 20 45 6e 74 72 | 79 22 20 2b 20 78 20 2b |ing Entr|y" + x +|
|000000e0| 20 22 6f 66 22 20 2b 20 | 79 0d 0a 20 20 20 75 70 | "of" + |y..   up|
|000000f0| 64 61 74 65 20 72 65 63 | 6f 72 64 0d 0a 6e 65 78 |date rec|ord..nex|
|00000100| 74 0d 0a 66 6f 72 20 6c | 61 73 74 20 77 69 74 68 |t..for l|ast with|
|00000110| 20 78 20 3d 20 22 78 22 | 0d 0a 20 20 20 6c 61 73 | x = "x"|..   las|
|00000120| 74 2e 4e 6f 20 3d 20 78 | 0d 0a 20 20 20 75 70 64 |t.No = x|..   upd|
|00000130| 61 74 65 20 72 65 63 6f | 72 64 0d 0a 6e 65 78 74 |ate reco|rd..next|
|00000140| 0d 0a 55 6e 6c 6f 63 6b | 20 52 65 63 6f 72 64 73 |..Unlock| Records|
|00000150| 0d 0a 55 6e 6c 6f 63 6b | 20 4c 61 73 74 0d 0a 04 |..Unlock| Last...|
|00000160| 00 52 65 6e 75 6d 62 65 | 72 20 20 20 20 20 20 20 |.Renumbe|r       |
|00000170| 20 20 20 20 20          |                         |        |        |
+--------+-------------------------+-------------------------+--------+--------+